Imports MyGeneration.dOOdads
Imports TA.BE
Imports System.Data
Imports System.Data.SqlClient

Public Class EMPLOYEE_TYPE
  Inherits _EMPLOYEE_TYPE

  Public Function ListAllEmpType(ByVal where As String) As DataTable
    Dim objEmp As New EMPLOYEE_TYPE()
    Dim str As String = "SELECT * FROM EMPLOYEE_TYPE "
    If where <> String.Empty Then
      str += where
    End If
    objEmp.LoadFromRawSql(str)
    Return objEmp.DefaultView.Table()
  End Function
  Public Function ListEmpType(ByVal where As String) As DataTable
    Dim objEmp As New EMPLOYEE_TYPE()
    Dim str As String = "SELECT ID,NAME,DESCRIPTION,CREATED_DATE,CRETED_BY from EMPLOYEE_TYPE "
    If where <> String.Empty Then
      str += where
    End If
    objEmp.LoadFromRawSql(str)
    Return objEmp.DefaultView.Table()
  End Function




End Class
